SuperModels in the Rainforest/SuperModels in the Rainforest.iso/rain.dxr/00010_Girl -- Selector Sprite Script 1.ls

Text File | 1995-10-13 | 283 b | 14 lines

on mouseDown
  global giCurrentGirl, giMaxGirls
  buttonLogic()
  if the result = 1 then
    if giCurrentGirl = 1 then
      go("MainLoopEnd")
      set giCurrentGirl to giMaxGirls
    else
      go(the frame - 1)
      set giCurrentGirl to giCurrentGirl - 1
    end if
  end if
end